Language/OS - Multiplatform Resource Library/LANGUAGE OS.iso/lisp/eulisp/comp0_89.lha/Feel/Boot/Compiler/mod-info.fm

Text File | 1993-07-16 | 11KB | 2,274 lines

(standard list-fns scan-args syntx-env pass props)
14
4002
(name Module-State-Error direct-superclasses direct-slot-descriptions msg initarg initfunction "" values metaclass-hypotheses direct-initargs (values msg) module-info imports slot-class %_*unbound*_% class exports definitions mod-info import-list generic-get-mod-ops lambda-list (decl) method-class argtype 1 methods domain signature function "Thing declared twice" "** ~a defined more than once~%" make-module-export (exporter defns module) 3 "Import in module body" "(Expose: ~a~%" "~a)" 2 "'~a'" (Module-State-Error set-module-interface module-info-defns module-info-class module-info-imports find-module-import) ((strip (union (except (fold scan-args) (union (import standard))) (import list-fns) (import scan-args) (import syntx-env) (import pass) (import props))) Module-State-Error set-module-interface module-info-defns module-info-class module-info-imports import-home import-real-name imported-definition find-module-import) mod-info)
36
0 0 17 0
5
0 0 0 0
3
0
31
0 0 160 0
17
1
36
0 0 27 0
5
0 0 0 0
4
0 0 44 0
46
1
(boot . make-installed-module)
34
2
36
0 0 90 0
5
0 0 0 0
8
3
4
0 0 42 0
5
0 0 45 0
3
0
39
8
0
5
0 0 46 0
3
0
39
28
1
5
0 0 47 0
3
0
39
28
1
5
0 0 48 0
3
0
39
28
1
5
0 0 49 0
3
0
39
28
1
5
0 0 50 0
3
0
39
28
1
17
1
1
(boot . install-local-bindings)
34
3
17
1
36
0 0 28 0
5
0 0 1 0
8
3
4
0 0 43 0
1
(boot . make-interface)
34
2
17
1
14
2
1
37
22
0
36
0 0 243 0
1
(init . make)
1
(errors . <condition-class>)
4
0 0 1 0
3
0
39
9
4
0 0 2 0
3
0
39
29
4
0 0 3 0
3
0
39
29
1
(errors . <condition>)
3
0
39
3
0
39
29
4
0 0 4 0
3
0
39
29
4
0 0 1 0
3
0
39
9
4
0 0 5 0
3
0
39
29
4
0 0 6 0
3
0
39
29
4
0 0 5 0
3
0
39
29
4
0 0 7 0
3
0
39
29
36
0 14 117 0
8
10
40
0
3
0
39
29
18
3
0
39
9
4
0 0 1 0
3
0
39
9
4
0 0 9 0
3
0
39
29
4
0 0 6 0
3
0
39
29
4
0 0 9 0
3
0
39
29
4
0 0 7 0
3
0
39
29
36
0 14 50 0
8
12
40
0
3
0
39
29
18
3
0
39
29
18
3
0
39
29
4
0 0 10 0
3
0
39
29
3
0
3
0
39
29
4
0 0 11 0
3
0
39
29
4
0 0 12 0
3
0
39
29
18
11
34
-2
7
0 0 45 0
36
0 1 167 0
1
(init . make)
1
(init . <structure-class>)
4
0 0 1 0
3
0
39
9
4
0 0 13 0
3
0
39
29
4
0 0 3 0
3
0
39
29
1
(mod-cache . import-module)
3
0
39
3
0
39
29
4
0 0 4 0
3
0
39
29
4
0 0 1 0
3
0
39
9
4
0 0 14 0
3
0
39
29
4
0 0 15 0
3
0
39
29
1
(init . <local-slot-description>)
3
0
39
29
4
0 0 6 0
3
0
39
29
4
0 0 14 0
3
0
39
29
4
0 0 7 0
3
0
39
29
4
0 0 16 0
3
0
39
29
18
3
0
39
9
4
0 0 1 0
3
0
39
9
4
0 0 17 0
3
0
39
29
4
0 0 15 0
3
0
39
29
1
(init . <local-slot-description>)
3
0
39
29
4
0 0 6 0
3
0
39
29
4
0 0 17 0
3
0
39
29
4
0 0 7 0
3
0
39
29
4
0 0 16 0
3
0
39
29
18
3
0
39
29
4
0 0 1 0
3
0
39
9
4
0 0 18 0
3
0
39
29
4
0 0 15 0
3
0
39
29
1
(init . <local-slot-description>)
3
0
39
29
4
0 0 6 0
3
0
39
29
4
0 0 18 0
3
0
39
29
4
0 0 7 0
3
0
39
29
4
0 0 16 0
3
0
39
29
18
3
0
39
29
4
0 0 1 0
3
0
39
9
4
0 0 19 0
3
0
39
29
4
0 0 15 0
3
0
39
29
1
(init . <local-slot-description>)
3
0
39
29
4
0 0 6 0
3
0
39
29
4
0 0 19 0
3
0
39
29
4
0 0 7 0
3
0
39
29
4
0 0 16 0
3
0
39
29
18
3
0
39
29
18
3
0
39
29
4
0 0 10 0
3
0
39
29
3
0
3
0
39
29
18
11
34
-2
7
0 0 51 0
36
0 0 27 0
1
(telos1 . find-slot-reader)
4
0 0 51 0
4
0 0 19 0
11
34
2
7
0 0 47 0
36
0 0 66 0
36
0 0 26 0
1
(init . setter)
1
(init . setter)
10
33
1
4
0 0 47 0
36
0 0 27 0
1
(telos1 . find-slot-writer)
4
0 0 51 0
4
0 0 19 0
11
34
2
11
33
2
18
36
0 0 27 0
1
(telos1 . find-slot-reader)
4
0 0 51 0
4
0 0 18 0
11
34
2
7
0 0 52 0
36
0 0 66 0
36
0 0 26 0
1
(init . setter)
1
(init . setter)
10
33
1
4
0 0 52 0
36
0 0 27 0
1
(telos1 . find-slot-writer)
4
0 0 51 0
4
0 0 18 0
11
34
2
11
33
2
18
36
0 0 27 0
1
(telos1 . find-slot-reader)
4
0 0 51 0
4
0 0 17 0
11
34
2
7
0 0 48 0
36
0 0 66 0
36
0 0 26 0
1
(init . setter)
1
(init . setter)
10
33
1
4
0 0 48 0
36
0 0 27 0
1
(telos1 . find-slot-writer)
4
0 0 51 0
4
0 0 17 0
11
34
2
11
33
2
18
36
0 0 27 0
1
(telos1 . find-slot-reader)
4
0 0 51 0
4
0 0 14 0
11
34
2
7
0 0 49 0
36
0 0 66 0
36
0 0 26 0
1
(init . setter)
1
(init . setter)
10
33
1
4
0 0 49 0
36
0 0 27 0
1
(telos1 . find-slot-writer)
4
0 0 51 0
4
0 0 14 0
11
34
2
11
33
2
18
36
0 10 131 0
11
4
0 0 20 0
5
0 0 0 0
39
51
2
7
0 0 53 0
36
0 9 64 0
11
4
0 0 20 0
6
1
39
51
2
7
0 0 46 0
36
0 9 32 0
11
4
0 0 20 0
6
2
39
51
1
7
0 0 54 0
36
0 0 143 0
1
(init . make)
1
(class-names . <generic-function>)
4
0 0 1 0
3
0
39
9
4
0 0 22 0
3
0
39
29
4
0 0 23 0
3
0
39
29
4
0 0 24 0
3
0
39
29
4
0 0 25 0
3
0
39
29
1
(class-names . <method>)
3
0
39
29
4
0 0 26 0
3
0
39
29
4
0 0 27 0
3
0
39
29
4
0 0 28 0
3
0
39
29
3
0
3
0
39
29
4
0 0 29 0
3
0
39
29
1
(class-names . <object>)
3
0
39
3
0
39
29
18
11
34
-2
7
0 0 55 0
36
0 0 127 0
1
(init . add-method)
4
0 0 55 0
36
0 0 105 0
1
(init . make)
36
0 0 22 0
1
(init . generic-method-class)
4
0 0 55 0
10
34
1
4
0 0 30 0
3
0
39
9
1
(abs-syntx . syntax-obj)
3
0
39
3
0
39
29
4
0 0 26 0
3
0
39
29
4
0 0 27 0
3
0
39
29
4
0 0 31 0
3
0
39
29
36
0 7 143 0
8
12
40
1
3
0
39
29
18
11
34
-2
11
33
2
18
36
0 6 163 0
11
4
0 0 20 0
6
3
39
51
2
7
0 0 56 0
36
0 0 127 0
1
(init . add-method)
4
0 0 55 0
36
0 0 105 0
1
(init . make)
36
0 0 22 0
1
(init . generic-method-class)
4
0 0 55 0
10
34
1
4
0 0 30 0
3
0
39
9
1
(abs-syntx . module-definition)
3
0
39
3
0
39
29
4
0 0 26 0
3
0
39
29
4
0 0 27 0
3
0
39
29
4
0 0 31 0
3
0
39
29
36
0 6 25 0
8
12
40
1
3
0
39
29
18
11
34
-2
11
33
2
18
36
0 0 127 0
1
(init . add-method)
4
0 0 55 0
36
0 0 105 0
1
(init . make)
36
0 0 22 0
1
(init . generic-method-class)
4
0 0 55 0
10
34
1
4
0 0 30 0
3
0
39
9
1
(abs-syntx . export-spec)
3
0
39
3
0
39
29
4
0 0 26 0
3
0
39
29
4
0 0 27 0
3
0
39
29
4
0 0 31 0
3
0
39
29
36
0 5 142 0
8
12
40
1
3
0
39
29
18
11
34
-2
11
33
2
18
36
0 0 127 0
1
(init . add-method)
4
0 0 55 0
36
0 0 105 0
1
(init . make)
36
0 0 22 0
1
(init . generic-method-class)
4
0 0 55 0
10
34
1
4
0 0 30 0
3
0
39
9
1
(abs-syntx . lambda-term)
3
0
39
3
0
39
29
4
0 0 26 0
3
0
39
29
4
0 0 27 0
3
0
39
29
4
0 0 31 0
3
0
39
29
36
0 5 6 0
8
12
40
1
3
0
39
29
18
11
34
-2
11
33
2
18
36
0 4 157 0
11
4
0 0 20 0
6
4
39
51
3
7
0 0 57 0
36
0 0 171 0
1
(init . make)
1
(class-names . <generic-function>)
4
0 0 1 0
3
0
39
9
4
0 0 34 0
3
0
39
29
4
0 0 23 0
3
0
39
29
4
0 0 35 0
3
0
39
29
4
0 0 25 0
3
0
39
29
1
(class-names . <method>)
3
0
39
29
4
0 0 26 0
3
0
39
29
4
0 0 36 0
3
0
39
29
4
0 0 28 0
3
0
39
29
3
0
3
0
39
29
4
0 0 29 0
3
0
39
29
1
(class-names . <object>)
3
0
39
9
1
(class-names . <object>)
3
0
39
29
1
(class-names . <object>)
3
0
39
29
18
3
0
39
29
18
11
34
-2
7
0 0 58 0
36
0 0 155 0
1
(init . add-method)
4
0 0 58 0
36
0 0 133 0
1
(init . make)
36
0 0 22 0
1
(init . generic-method-class)
4
0 0 58 0
10
34
1
4
0 0 30 0
3
0
39
9
1
(abs-syntx . export-directive)
3
0
39
9
1
(class-names . <object>)
3
0
39
29
1
(class-names . <object>)
3
0
39
29
18
3
0
39
29
4
0 0 26 0
3
0
39
29
4
0 0 36 0
3
0
39
29
4
0 0 31 0
3
0
39
29
36
0 2 247 0
8
12
40
3
3
0
39
29
18
11
34
-2
11
33
2
18
36
0 0 155 0
1
(init . add-method)
4
0 0 58 0
36
0 0 133 0
1
(init . make)
36
0 0 22 0
1
(init . generic-method-class)
4
0 0 58 0
10
34
1
4
0 0 30 0
3
0
39
9
1
(abs-syntx . import-directive)
3
0
39
9
1
(class-names . <object>)
3
0
39
29
1
(class-names . <object>)
3
0
39
29
18
3
0
39
29
4
0 0 26 0
3
0
39
29
4
0 0 36 0
3
0
39
29
4
0 0 31 0
3
0
39
29
36
0 2 57 0
8
12
40
3
3
0
39
29
18
11
34
-2
11
33
2
18
36
0 0 155 0
1
(init . add-method)
4
0 0 58 0
36
0 0 133 0
1
(init . make)
36
0 0 22 0
1
(init . generic-method-class)
4
0 0 58 0
10
34
1
4
0 0 30 0
3
0
39
9
1
(abs-syntx . expose-directive)
3
0
39
9
1
(class-names . <object>)
3
0
39
29
1
(class-names . <object>)
3
0
39
29
18
3
0
39
29
4
0 0 26 0
3
0
39
29
4
0 0 36 0
3
0
39
29
4
0 0 31 0
3
0
39
29
36
0 1 45 0
8
12
40
3
3
0
39
29
18
11
34
-2
11
33
2
18
36
0 0 242 0
11
4
0 0 20 0
6
5
39
51
2
7
0 0 50 0
36
0 0 150 0
1
(init . add-method)
1
(abs-syntx . print-decl)
36
0 0 124 0
1
(init . make)
36
0 0 26 0
1
(init . generic-method-class)
1
(abs-syntx . print-decl)
10
34
1
4
0 0 30 0
3
0
39
9
1
(syntx-env . imported-definition)
3
0
39
9
1
(class-names . <object>)
3
0
39
29
18
3
0
39
29
4
0 0 26 0
3
0
39
29
4
0 0 40 0
3
0
39
29
4
0 0 31 0
3
0
39
29
36
0 0 25 0
8
12
40
2
3
0
39
29
18
11
34
-2
11
33
2
17
2
3
1
37
1
(extras0 . format)
11
4
0 0 41 0
36
0 0 19 0
1
(syntx-env . import-home)
8
8
10
34
1
36
0 0 19 0
1
(syntx-env . import-real-name)
8
9
10
34
1
39
3
0
39
12
14
8
4
9
13
5
34
-3
1
(syntx-env . find-name)
36
0 0 19 0
1
(props . module-imports)
8
6
10
33
1
12
11
14
7
3
9
13
4
34
2
36
0 0 29 0
1
(extras0 . format)
3
1
4
0 0 38 0
8
8
3
0
39
12
34
-3
18
36
0 0 36 0
1
(syntx-env . read-imports)
36
0 0 19 0
1
(abs-syntx . expose-spec-importer)
8
9
10
33
1
10
34
1
36
0 0 29 0
1
(extras0 . format)
3
1
4
0 0 39 0
8
5
3
0
39
12
34
-3
18
15
5
1
(syntx-env . module-imports-list)
9
13
3
34
1
1
(init . error)
4
0 0 37 0
1
(errors . <Internal-Error>)
3
0
12
14
9
4
9
13
5
34
-3
22
1
12
20
0
0
1
(list-fns . fold)
36
0 0 21 0
12
40
2
8
4
3
0
12
14
9
4
9
13
5
34
3
36
0 0 19 0
1
(abs-syntx . defn-ide)
8
5
10
33
1
36
0 0 22 0
1
(abs-syntx . export-spec-name)
8
4
19
0
0
10
33
1
49
32
0 0 8 0
18
39
37
18
15
2
37
22
2
12
20
0
0
10
20
0
1
1
(list-fns . fold)
36
0 0 21 0
12
40
2
8
4
3
0
12
14
9
4
9
13
5
34
3
1
(boot . append)
36
0 0 25 0
4
0 0 58 0
8
6
8
5
19
0
0
8
6
19
0
1
12
33
3
12
11
14
7
3
9
13
4
34
2
17
2
3
0
3
0
39
37
3
0
11
3
0
39
14
4
2
39
37
10
3
0
39
15
3
3
0
39
37
22
1
11
42
32
0 0 9 0
18
15
2
37
36
0 0 20 0
1
(abs-syntx . defn-ide)
8
5
26
10
33
1
10
16
20
0
0
18
36
0 0 28 0
1
(list-fns . detect)
36
0 0 134 0
8
5
40
1
8
5
11
34
2
32
0 0 94 0
36
0 0 67 0
1
(init . cerror)
4
0 0 32 0
4
0 0 45 0
4
0 0 9 0
3
0
39
9
8
7
19
0
0
3
0
39
3
0
39
29
4
0 0 5 0
3
0
39
29
4
0 0 33 0
3
0
39
29
18
12
34
-3
18
4
0 0 56 0
12
27
12
11
14
7
3
9
13
4
26
31
0 0 156 1
4
0 0 56 0
12
27
8
4
26
8
4
39
11
14
7
3
9
13
4
26
31
0 0 182 1
36
0 0 19 0
1
(abs-syntx . defn-ide)
8
4
10
33
1
10
19
0
0
14
4
2
43
37
1
(list-fns . fold)
36
0 0 65 0
12
40
2
36
0 0 43 0
1
(init . mapcar)
4
0 0 55 0
36
0 0 19 0
1
(pass . subcomponents)
8
10
10
33
1
3
0
12
34
-3
3
0
3
0
39
12
14
7
4
9
13
5
34
3
36
0 0 23 0
4
0 0 56 0
8
5
26
8
5
26
11
26
31
0 1 51 1
36
0 0 23 0
1
(boot . append)
8
6
27
8
6
27
11
34
2
14
5
2
39
37
18
4
0 0 55 0
9
13
3
33
1
36
0 0 26 0
1
(scan-args . scan-args)
4
0 0 21 0
8
5
3
0
12
34
3
36
0 0 19 0
4
0 0 54 0
8
6
3
0
31
0 0 51 1
36
0 0 38 0
36
0 0 26 0
1
(init . setter)
1
(props . module-imports)
10
33
1
8
7
8
5
11
33
2
18
36
0 0 72 0
36
0 0 26 0
1
(init . setter)
1
(props . module-flat-imports)
10
33
1
8
7
36
0 0 36 0
1
(syntx-env . flatten-imports)
36
0 0 19 0
1
(abs-syntx . module-import-spec)
8
6
10
33
1
10
33
1
11
33
2
18
36
0 0 39 0
36
0 0 26 0
1
(init . setter)
1
(props . module-declarations)
10
33
1
8
7
8
4
26
11
33
2
18
36
0 0 61 0
4
0 0 57 0
36
0 0 39 0
1
(boot . append)
8
6
26
36
0 0 19 0
1
(syntx-env . module-imports-list)
8
11
10
34
1
11
34
2
8
4
27
8
9
12
26
31
0 2 205 1
36
0 0 38 0
36
0 0 26 0
1
(init . setter)
1
(props . module-exports)
10
33
1
8
8
8
4
11
33
2
17
6
37
1
(init . make)
4
0 0 51 0
4
0 0 14 0
3
0
39
9
8
6
3
0
39
29
4
0 0 18 0
3
0
39
29
8
5
3
0
39
29
18
11
14
7
3
9
13
4
34
-2
18
3
0
37
18
4
0 0 8 0
37